object AboutForm: TAboutForm Left = 298 Top = 186 HorzScrollBar.Visible = False VertScrollBar.Visible = False ActiveControl = Button1 BorderIcons = [] BorderStyle = bsDialog Caption = 'About' ClientHeight = 326 ClientWidth = 364 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 116 TextHeight = 16 object Label1: TLabel Left = 84 Top = 57 Width = 182 Height = 16 Caption = 'Instant Drive Access v1.44' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -15 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 88 Top = 79 Width = 187 Height = 16 Caption = 'by SysTeam, Jesper Lauridsen' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 55 Top = 182 Width = 253 Height = 16 Caption = 'Comment and suggestions are welcome at' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Image1: TImage Left = 166 Top = 12 Width = 32 Height = 32 AutoSize = True Picture.Data = {} end object UrlLabel1: TUrlLabel Left = 76 Top = 254 Width = 212 Height = 16 Cursor = 5 Caption = 'http://www.systeam.dk/ida/ida.html' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False PopupMenu = UrlLabel1. URL = 'http://www.systeam.dk/ida/ida.html' end object Label5: TLabel Left = 89 Top = 233 Width = 186 Height = 16 Caption = 'Get the latest version from here:' end object UrlLabel2: TUrlLabel Left = 129 Top = 204 Width = 107 Height = 16 Cursor = 5 Caption = 'SysTeam support' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False PopupMenu = UrlLabel2. URL = 'mailto:support@systeam.dk' end object RegLabel: TLabel Left = 0 Top = 105 Width = 363 Height = 16 Alignment = taCenter AutoSize = False Caption = '(Unregistered)' end object UrlRegister: TUrlLabel Left = 120 Top = 139 Width = 124 Height = 16 Cursor = 5 Caption = 'Click here to register!' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -15 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False PopupMenu = UrlRegister. URL = 'http://www.getsoftware.com/cgi/info.gsc?productid=83' end object Button1: TButton Left = 133 Top = 284 Width = 91 Height = 31 Caption = 'OK' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = Button1Click end end